# --------------------
# [Controllable Drawing Turtle]
# [Made by]: Kevin J.
# [Date]: Monday, July 28, 2025
# [Version]: 1
# --------------------

# Using RegEx to verify the string is a valid color name wouldn't work; trusting the user types in a valid color name.

# Set the speed of the script to Infinity.
speed Infinity

# Setup variables used by this script.
write "[Setup]:"
await read 'Pen Color: ', defer penColor
await read 'Size of Pen: ', defer penSize
typeline()

# Set the pen to the settings the user set in the previous prompts.
pen penColor, penSize

# Clear the screen and write new text to the user.
write "[SUCCESS]: Setup complete."
write "Waiting for 5 seconds..."
pause 5
cs()
write "Use WASD to move the turtle."

# Add controls to move the turtle.
keydown 'W', ->
  fd 10
keydown 'A', ->
  lt 20
keydown 'S', ->
  bk 10
keydown 'D', ->
  rt 20